home *** CD-ROM | disk | FTP | other *** search
/ Champak 114 / Vol 114.iso / games / y2k_tetr.swf / scripts / DefineSprite_204 / frame_13 / DoAction.as
Encoding:
Text File  |  2010-08-12  |  431 b   |  30 lines
  1. if(c2 == c1)
  2. {
  3.    c2 = "0";
  4. }
  5. if(c3 == c1 or c3 == c2)
  6. {
  7.    c3 = "0";
  8. }
  9. if(c4 == c1 or c4 == c2 or c4 == c3)
  10. {
  11.    c4 = "0";
  12. }
  13. a = "1";
  14. while(a < "4")
  15. {
  16.    b = a + "1";
  17.    while("4" >= b)
  18.    {
  19.       if(eval("c" add a) < eval("c" add b))
  20.       {
  21.          tdim = eval("c" add a);
  22.          set("c" add a,eval("c" add b));
  23.          set("c" add b,tdim);
  24.       }
  25.       b += "1";
  26.    }
  27.    a += "1";
  28. }
  29. y1 = "1";
  30.